Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
   Dim dt As DateTime = New DateTime(2010, 8, 11, 11, 12, 10, 10)
   System.Threading.Thread.CurrentThread.CurrentCulture = New CultureInfo("pl-PL")
   Response.Write("<b><u>pl-PL</u></b><br>")
   Response.Write(dt.ToString() & "<br>")

   System.Threading.Thread.CurrentThread.CurrentCulture = New CultureInfo("en-US")
   Response.Write("<b><u>en-US</u></b><br>")
   Response.Write(dt.ToString() & "<br>")

   System.Threading.Thread.CurrentThread.CurrentCulture = New CultureInfo("ru-RU")
   Response.Write("<b><u>ru-RU</u></b><br>")
   Response.Write(dt.ToString() & "<br>")

   System.Threading.Thread.CurrentThread.CurrentCulture = New CultureInfo("fi-FI")
   Response.Write("<b><u>fi-FI</u></b><br>")
   Response.Write(dt.ToString() & "<br>")

   System.Threading.Thread.CurrentThread.CurrentCulture = new CultureInfo("th-TH")
   Response.Write("<b><u>th-TH</u></b><br>")
   Response.Write(dt.ToString())
End Sub
